FOR EACH IN_mstr NO-LOCK  WHERE IN_qty_oh > 0
                         AND ( TODAY - IN_iss_date) >= 100 
                         AND ( In_site BEGINS "500" )
                         AND (In_loc BEGINS "rw01" )
                         AND ( IN_part >= "100") 
                         AND (IN_part <= "103") ,

       EACH ptp_det NO-LOCK WHERE ptp_part=IN_part AND ptp__chr01="C",
       EACH Sct_det NO-LOCK WHERE sct_part = ptp_part AND sct_site = ptp_site AND sct_sim="STANDARD",
       EACH Pt_mstr NO-LOCK WHERE pt_part = IN_PART
    BY (today - IN_iss_date):
    DISPLAY IN_part pt_desc1 pt_um sct_cst_tot IN_qty_oh (TODAY - in_iss_date).


    END
